home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / aminet / gfx / 3d / rayshade40_enh2.lha / Examples / glass2.ray < prev    next >
Text File  |  1992-04-12  |  734b  |  46 lines
  1. # 1 "glass.ray"
  2.  
  3.  
  4.  
  5.  
  6. # 1 "glass.def.ray" 1
  7.  
  8.  
  9.  
  10.  
  11. name glass
  12. union
  13.     torus 0.95 0.06 0 0 2 0 0 1
  14.     difference
  15.         list  
  16.             cone 0.9 0 0 -0.001 1.0 0 0 2
  17.             disc 1 0 0 2 0 0 1
  18.             disc 0.9 0 0 -.001 0 0 -1
  19.         end
  20.         list  
  21.             cone 0.7 0 0 0.1   0.9 0 0 2.2
  22.             disc .9 0 0 2.2 0 0 1
  23.             disc .7 0 0 0.1 0 0 -1
  24.         end
  25.     end
  26. end
  27. # 5 "glass.ray" 2
  28.  
  29.  
  30. surface glass
  31.     diffuse .08 .08 .08 specular .2 .2 .2
  32.     reflect 1. transp 1 body .8 .8 .8 index 1.3
  33. surface white ambient 1 1 1
  34. surface red diffuse .8 0 0  ambient .1 0 0 specular .6 .6 .6
  35.  
  36. object glass glass  
  37.  
  38. plane ambient .1 .1 .1 diffuse .7 .7 .7 0 0 0  0 0 1
  39.         texture checker red scale .8 .8 .8 translate 0 0 -.2
  40.  
  41. background .1 .3 .8
  42. eyep 0 -10 7
  43. fov 30
  44. light 1. directional 1. -1. 1.
  45. fov 30 23
  46.